home *** CD-ROM | disk | FTP | other *** search
/ Delphi 2.0 - Programmer's Utilities Power Pack / Delphi 2.0 Programmer's Utilities Power Pack.iso / e_to_l / fccopy / fcopy.dpr next >
Encoding:
Text File  |  1996-09-15  |  6.1 KB  |  100 lines
  1. {$A+,B-,D-,F-,G+,I-,K-,L-,N+,P+,Q-,R-,S-,T-,V-,W-,X+,Y-}
  2. {$M 8192,8192}
  3.  
  4. {FIXED PRELOAD PERMANENT}
  5.  
  6. (*********************************************************************)
  7. (*********************************************************************)
  8. (** FCTEST.PAS - Test unit for the TASP Development Delphi ***********)
  9. (** (tnx Borland!!!) File Copy Component. ****************************)
  10. (*********************************************************************)
  11. (*********************************************************************)
  12. (*                                                             *******)
  13. (* The TASP Filecopy Component is a product of:                *******)
  14. (*                                                             *******)
  15. (* Daniel J. Karnes                                            *******)
  16. (* 9942 W. Broadway Suite 209                                  *******)
  17. (* Anaheim, CA 92804                                           *******)
  18. (*                                                             *******)
  19. (* Email: TASP@TASP.NET  or  TASPEngr@AOL.COM                  *******)
  20. (*                                                             *******)
  21. (* FCTEST and FILECOPY are distributed as try-before-you-buy   *******)
  22. (* SHAREWARE. Registration is expected if you continue using   *******)
  23. (* this TASP Development product beyond a free 7 days period   *******)
  24. (* of evaluation. Please support SHAREWARE and we'll all win!  *******)
  25. (*                                                             *******)
  26. (* REGISTRATION FEES:                                          *******)
  27. (*                                                             *******)
  28. (* $15.00 - Single user. NON COMMERCIAL.                       *******)
  29. (*                                                             *******)
  30. (* $27.00 - Shareware author's license.                        *******)
  31. (*                                                             *******)
  32. (* $79.00 - Commercial license.                                *******)
  33. (*                                                             *******)
  34. (* All others must email for a quote before using.             *******)
  35. (*                                                             *******)
  36. (* Please register today! You'll get a laser printed manual    *******)
  37. (* and reference along with a registered copy of the product   *******)
  38. (* (no nagware notice and more features & speed!) on disk or   *******)
  39. (* via email if you specify.                                   *******)
  40. (*                                                             *******)
  41. (* Send registrations to:                                      *******)
  42. (*                                                             *******)
  43. (* Daniel J. Karnes                                            *******)
  44. (* 9942 W. Broadway Suite 209                                  *******)
  45. (* Anaheim, CA 92804                                           *******)
  46. (*                                                             *******)
  47. (* *** IF EVERYONE SUPPORTS SHAREWARE WE'LL ALL MAKE OUT!! *** *******)
  48. (*                                                             *******)
  49. (*******                                                       *******)
  50. (*******           DISCLAIMER AND COPYRIGHT NOTICE             *******)
  51. (*******                                                       *******)
  52. (*                                                             *******)
  53. (* Using this example program or any other part of this        *******)
  54. (* software is agreeing to not holding the author thereof to   *******)
  55. (* any form of warranty or guarantee whether expressed or      *******)
  56. (* implied. Continuing to use this example program or any      *******)
  57. (* part of the accompanying software is also agreement that    *******)
  58. (* compiling and or implementing any part of this program is   *******)
  59. (* an action that any user will be undertaking at the users    *******)
  60. (* own personal risk and liability.                            *******)
  61. (*                                                             *******)
  62. (* Any user of this example program or any other part of this  *******)
  63. (* original distribution is expressely agreeing to all terms   *******)
  64. (* and conditions stated by the author if the user implements  *******)
  65. (* any part of this software in any way.                       *******)
  66. (*                                                             *******)
  67. (* WHEW! And my attorney even likes it! ;)  I just hope that   *******)
  68. (* *you* like the software!                                    *******)
  69. (*                                                             *******)
  70. (* Let me know if you like it. (the SOFTWARE!) Think it sucks  *******)
  71. (* Or want more!                                               *******)
  72. (*                                                             *******)
  73. (* djk@TASP.NET / TASP@TASP.NET / TASPEngr@AOL.COM             *******)
  74. (*                                                             *******)
  75. (* Send registrations to:                                      *******)
  76. (*                                                             *******)
  77. (* Daniel J. Karnes                                            *******)
  78. (* 9942 W. Broadway Suite 209                                  *******)
  79. (* Anaheim, CA 92804                                           *******)
  80. (*                                                             *******)
  81. (* Of course comments and suggestions are solicited!           *******)
  82. (*                                                             *******)
  83. (*********************************************************************)
  84. (*********************************************************************)
  85. (*********************************************************************)
  86. (*********************************************************************)
  87.  
  88. Program Fcopy;
  89.  
  90. USES
  91.   Forms,
  92.   Fctest in 'FCTEST.PAS' {TestProgram};
  93.  
  94. {$R *.RES}
  95.  
  96. BEGIN
  97.   Application.CreateForm(TTestProgram, TestProgram);
  98.   Application.Run;
  99. END.
  100.